Public Class ExceptionHandler
    Public Shared Sub ShowAndLog(ByVal message As String, ByVal exception As System.Exception)
        MessageBox.Show(message, "Er is een fout opgetreden", MessageBoxButtons.OK, MessageBoxIcon.Error)
        ' ThisAddIn.Log.Error(message, exception)
    End Sub
End Class